\documentclass[a4paper]{article}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\usepackage[spanish]{babel}
\usepackage[utf8x]{inputenc}
\usepackage{amsmath}  
\usepackage{macros}
\usepackage[dvips]{graphicx}
\usepackage{pstricks,pstricks-add,pst-math,pst-xkey}
\usepackage{enumitem}
\usepackage{framed} \definecolor{shadecolor}{gray}{0.9}
\usepackage[top=3cm, bottom=3cm, left=2.54cm, right=2.54cm]{geometry}
\usepackage{fancyhdr}
\pagestyle{fancy}
\usepackage{Sweave}



\renewcommand{\FrameCommand}{\colorbox{shadecolor}}

\lhead{\textsc{Universidad San Pablo CEU}}
\rhead{\textsl{\textsf{Departamento de Métodos Cuantitativos}}}
\renewcommand{\headrulewidth}{0pt}

\makeatletter
\let\savees@listquot\es@listquot
\def\es@listquot{\protect\savees@listquot}
\makeatletter

\begin{document}
\examen{EXAMEN ORDINARIO DE ESTADÍSTICA:\\[1mm] ESTADÍSTICA DESCRIPTIVA Y REGRESIÓN}{1º de Psicología}{10 de enero de
2011}{Modelo A} \noindent\textbf{Duración}: $1$ hora. \vskip 1cm

\begin{enumerate}[leftmargin=*]
\item\puntos{5} El siguiente gráfico refleja la distribución de frecuencias de un test de autoestima aplicado a 104 personas.
\begin{center}
\scalebox{0.7}{\includegraphics{psi2011ene-histograma_autoestima}}
\end{center}
Se pide:
\begin{enumerate}
\item Construir el polígono de frecuencias acumuladas de toda la muestra sin separar por sexos.
\item Según el rango intercuartílico, ¿qué distribución es menos dispersa, la de hombres o la de mujeres? Justificar la respuesta.
\item ¿Qué distribución es más asimétrica, la de hombres o la de mujeres? Justificar la respuesta.
\end{enumerate}



\begin{solucion}
\begin{enumerate}
\item Para dibujar el polígono de frecuencias acumuladas necesitamos la tabla de frecuencias con las frecuencias acumuladas. A partir del gráfico del enunciado se obtiene la siguiente tabla de frecuencias:
\begin{center}
